5 DV=PEEK(186):IFDV<8THENDV=8
7 DIMW$(300)
10 POKE53281,0:POKE53280,0:PRINT""
15 SYS57812"CQINP/CM CE00",DV,0:POKE780,0:POKE781,0:POKE782,206:SYS65493
16 SYS52736,"ENTRYFORM",DV
18 H=PEEK(252)*256+PEEK(251)
100 PRINT"[147][158]"TAB(7)"[195] [207] [196] [197] [209] [213] [197] [211] [212]   ' 9 3
102 [153][163]10)"VAL (null) (null) (null) (null)   ASC (null) (null) (null)"
104 [153][163]9)"1  CONT(null)RINT ENTRY FORM
106 PRINTTAB(9)"2  [154][210]ETURN TO [204][207][193][196][211][212][193][210]
110 [161]A$:[139]A$[179]"1"[176]A$[177]"2"[167]110
112 [139]A$[178]"2"[167]40000
120 [153]"OPEN   (null)ET YOUR PRINTER AT THE TOP OF A
130 PRINT"   PAGE AND PRESS A KEY.
135 [161]A$:[139]A$[178]""[167]135
200 [159]4,4,7
210 [129]I[178]0[164]H
220 [152]4,"   "W$(I)
230 [130]:[160]4
240 [137]100
10000 [159]15,8,15,"S0:CODEQUEST '93":[160]15:[148]"CODEQUEST '93",8:[128]
40000 A$[178]"HELLO CONNECT":[129]I[178]8[164]9:[160]2:[159]2,I,2:[160]2:[139]ST[167]40030
40010 [160]15:[159]15,I,15,"R0:"[170]A$[170]"="[170]A$:[132]15,ER:[160]15:[139]ER[178]63[167]40030
40020 [130]:[153]"LOAD":[151]2048,0:[151]44,8:[151]53272,23:[151]186,DV:[128]
40030 [151]646,[194](53281):[153]"LOADLOAD"[199](34)A$[199](34)","I
40040 [153]"RUN":[151]631,13:[151]632,13:[151]198,2:[128]